home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
HPAVC
/
HPAVC CD-ROM.iso
/
NEUCLS3.ZIP
/
NURN.ZP
/
MLP.BAT
< prev
next >
Wrap
DOS Batch File
|
1994-08-06
|
4KB
|
224 lines
:TOP
c:\neuron\batch\Ben menuF c:\neuron\batch\MLP.mnu
IF ERRORLEVEL 9 GOTO END
IF ERRORLEVEL 8 GOTO help
IF ERRORLEVEL 7 GOTO UTIL
IF ERRORLEVEL 6 GOTO wate
IF ERRORLEVEL 5 GOTO jinn
IF ERRORLEVEL 4 GOTO Procs
IF ERRORLEVEL 3 GOTO TMAP
IF ERRORLEVEL 2 GOTO INT6
IF ERRORLEVEL 1 GOTO NENERP
IF ERRORLEVEL 0 GOTO END
:NENERP
c:\neuron\batch\Ben menuF c:\neuron\batch\ner.mnu
IF ERRORLEVEL 5 GOTO TOP
IF ERRORLEVEL 4 GOTO nerhlp
IF ERRORLEVEL 3 GOTO nert
IF ERRORLEVEL 2 GOTO ner2
IF ERRORLEVEL 1 GOTO ner1
IF ERRORLEVEL 0 GOTO END
:ner1
c:\neuron\batch\Ben cls blue
IF NOT EXIST Nenr1.par copy c:\neuron\batch\Nenr1.par
Edit Nenr1.par
c:\neuron\Nenerp<Nenr1.par
pause
c:\neuron\batch\Ben cls blue
GOTO Nenerp
:ner2
c:\neuron\batch\Ben cls blue
c:\neuron\Nenerp
pause
c:\neuron\batch\Ben cls blue
GOTO Nenerp
:nert
If Not EXIST Nerp.out GOTO Nenerp
c:\neuron\batch\Ben list Nerp.out Nerp.out
GOTO Nenerp
:nerhlp
c:\neuron\batch\Ben list c:\neuron\batch\ner.hlp Backpropagation~Help
GOTO NENERP
GOTO TOP
:INT6
c:\neuron\batch\Ben menuF c:\neuron\batch\int.mnu
IF ERRORLEVEL 5 GOTO TOP
IF ERRORLEVEL 4 GOTO inthlp
IF ERRORLEVEL 3 GOTO int3
IF ERRORLEVEL 2 GOTO int2
IF ERRORLEVEL 1 GOTO int1
IF ERRORLEVEL 0 GOTO END
:INT1
c:\neuron\batch\Ben cls blue
IF NOT EXIST INT61.par copy c:\neuron\batch\INT61.par
Edit INT61.par
c:\neuron\INT6<INT61.par
pause
c:\neuron\batch\Ben cls blue
GOTO INT6
:INT2
Ben cls blue
c:\neuron\INT6
pause
c:\neuron\batch\Ben cls blue
GOTO INT6
:int3
If Not EXIST Int6.out GOTO Int6
c:\neuron\batch\Ben list int6.out Int6.out
GOTO Int6
:inthlp
c:\neuron\batch\Ben list c:\neuron\batch\int.hlp Fast~Training~Help
GOTO INT6
:TMAP
c:\neuron\batch\Ben menuF c:\neuron\batch\map.mnu
IF ERRORLEVEL 5 GOTO TOP
IF ERRORLEVEL 4 GOTO tmaphlp
IF ERRORLEVEL 3 GOTO tmap3
IF ERRORLEVEL 2 GOTO tmap2
IF ERRORLEVEL 1 GOTO tmap1
IF ERRORLEVEL 0 GOTO END
:Tmap1
c:\neuron\batch\Ben cls blue
IF NOT EXIST Tmap21.par copy c:\neuron\batch\Tmap21.par
Edit Tmap21.par
c:\neuron\Tmap2<Tmap21.par
pause
c:\neuron\batch\Ben cls blue
GOTO TMAP
:tmap2
c:\neuron\batch\Ben cls blue
c:\neuron\Tmap2
pause
c:\neuron\batch\Ben cls blue
GOTO TMAP
:tmap3
If Not EXIST tmap2.out GOTO Tmap
c:\neuron\batch\Ben list tmap2.out Tmap~Output
GOTO tmap
:tmaphlp
c:\neuron\batch\Ben list c:\neuron\batch\tmap.hlp MLP~Analysis~Help
GOTO TMAP
:Procs
c:\neuron\batch\Ben menuF c:\neuron\batch\prc.mnu
IF ERRORLEVEL 5 GOTO TOP
IF ERRORLEVEL 4 GOTO prochlp
IF ERRORLEVEL 3 GOTO proc3
IF ERRORLEVEL 2 GOTO proc2
IF ERRORLEVEL 1 GOTO proc1
IF ERRORLEVEL 0 GOTO END
:Proc1
c:\neuron\batch\Ben cls blue
IF NOT EXIST Proc1.par copy c:\neuron\batch\Proc1.par
Edit Proc1.par
c:\neuron\Procs<Proc1.par
pause
c:\neuron\batch\Ben cls blue
GOTO Procs
:Proc2
c:\neuron\batch\Ben cls blue
c:\neuron\Procs
pause
c:\neuron\batch\Ben cls blue
GOTO Procs
:Proc3
If Not EXIST Proc.out GOTO Procs
c:\neuron\batch\Ben list Proc.out Processing~Record
GOTO Procs
:Prochlp
c:\neuron\batch\Ben list c:\neuron\batch\Proc.hlp MLP~Processing~Help
GOTO Procs
:Jinn
c:\neuron\batch\Ben menuF c:\neuron\batch\jinn.mnu
IF ERRORLEVEL 3 GOTO TOP
IF ERRORLEVEL 2 GOTO jinhlp
IF ERRORLEVEL 1 GOTO jin1
IF ERRORLEVEL 0 GOTO END
:jin1
c:\neuron\batch\Ben cls blue
c:\neuron\Jinn
c:\neuron\batch\Ben cls blue
GOTO Jinn
:jinhlp
c:\neuron\batch\Ben list c:\neuron\batch\jin.hlp Code~Generation~Help
GOTO Jinn
:Wate
c:\neuron\batch\Ben menuF c:\neuron\batch\wate.mnu
IF ERRORLEVEL 4 GOTO TOP
IF ERRORLEVEL 3 GOTO watehlp
IF ERRORLEVEL 2 GOTO wate2
IF ERRORLEVEL 1 GOTO wate1
IF ERRORLEVEL 0 GOTO END
:wate1
c:\neuron\batch\Ben cls blue
c:\neuron\Watecon
c:\neuron\batch\Ben cls blue
GOTO wate
:wate2
If Not EXIST wate.out GOTO wate
c:\neuron\batch\Ben list wate.out Watecon~Output
GOTO wate
:watehlp
c:\neuron\batch\Ben list c:\neuron\batch\wate.hlp Weight~Conversion~Help
GOTO wate
:Help
c:\neuron\batch\Ben list c:\neuron\batch\MLPc.hlp MLP~Help
GOTO TOP
:Util
call c:\neuron\batch\Deldir
GOTO Top
:END